home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue35 / editnew / EDITNEW.ZIP / EDEMONEW.DFM / EDEMONEW.txt
Text File  |  1998-05-25  |  19KB  |  791 lines
  1. object Form1: TForm1
  2.   Left = 0
  3.   Top = 104
  4.   Width = 561
  5.   Height = 470
  6.   Caption = 
  7.     ' J.M.G∩┐╜as - sigecom@arrakis.es - Demo EditNew Versi∩┐╜n 2.1  Delph' +
  8.     'i 2 - 3'
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   ShowHint = True
  14.   OnCreate = FormCreate
  15.   PixelsPerInch = 96
  16.   TextHeight = 13
  17.   object Label1: TLabel
  18.     Left = 92
  19.     Top = 16
  20.     Width = 32
  21.     Height = 13
  22.     Caption = 'Label1'
  23.     Font.Color = clAqua
  24.     Font.Height = -11
  25.     Font.Name = 'MS Sans Serif'
  26.     Font.Style = []
  27.     ParentFont = False
  28.   end
  29.   object Label2: TLabel
  30.     Left = 92
  31.     Top = 54
  32.     Width = 32
  33.     Height = 13
  34.     Caption = 'Label2'
  35.     Font.Color = clAqua
  36.     Font.Height = -11
  37.     Font.Name = 'MS Sans Serif'
  38.     Font.Style = []
  39.     ParentFont = False
  40.   end
  41.   object Label3: TLabel
  42.     Left = 92
  43.     Top = 90
  44.     Width = 32
  45.     Height = 13
  46.     Caption = 'Label3'
  47.     Font.Color = clAqua
  48.     Font.Height = -11
  49.     Font.Name = 'MS Sans Serif'
  50.     Font.Style = []
  51.     ParentFont = False
  52.   end
  53.   object Label4: TLabel
  54.     Left = 276
  55.     Top = 16
  56.     Width = 32
  57.     Height = 13
  58.     Caption = 'Label4'
  59.     Font.Color = clAqua
  60.     Font.Height = -11
  61.     Font.Name = 'MS Sans Serif'
  62.     Font.Style = []
  63.     ParentFont = False
  64.   end
  65.   object Label5: TLabel
  66.     Left = 276
  67.     Top = 54
  68.     Width = 32
  69.     Height = 13
  70.     Caption = 'Label5'
  71.     Font.Color = clAqua
  72.     Font.Height = -11
  73.     Font.Name = 'MS Sans Serif'
  74.     Font.Style = []
  75.     ParentFont = False
  76.   end
  77.   object Label6: TLabel
  78.     Left = 276
  79.     Top = 90
  80.     Width = 32
  81.     Height = 13
  82.     Caption = 'Label6'
  83.     Font.Color = clAqua
  84.     Font.Height = -11
  85.     Font.Name = 'MS Sans Serif'
  86.     Font.Style = []
  87.     ParentFont = False
  88.   end
  89.   object Label7: TLabel
  90.     Left = 92
  91.     Top = 198
  92.     Width = 32
  93.     Height = 13
  94.     Caption = 'Label7'
  95.     Font.Color = clAqua
  96.     Font.Height = -11
  97.     Font.Name = 'MS Sans Serif'
  98.     Font.Style = []
  99.     ParentFont = False
  100.   end
  101.   object Label8: TLabel
  102.     Left = 8
  103.     Top = 16
  104.     Width = 33
  105.     Height = 13
  106.     Caption = 'Integer'
  107.   end
  108.   object Label9: TLabel
  109.     Left = 8
  110.     Top = 54
  111.     Width = 23
  112.     Height = 13
  113.     Caption = 'Float'
  114.   end
  115.   object Label10: TLabel
  116.     Left = 8
  117.     Top = 90
  118.     Width = 59
  119.     Height = 13
  120.     Caption = 'Integer Align'
  121.   end
  122.   object Label11: TLabel
  123.     Left = 196
  124.     Top = 16
  125.     Width = 44
  126.     Height = 13
  127.     Caption = 'Left Align'
  128.   end
  129.   object Label12: TLabel
  130.     Left = 196
  131.     Top = 54
  132.     Width = 57
  133.     Height = 13
  134.     Caption = 'Center Align'
  135.   end
  136.   object Label13: TLabel
  137.     Left = 196
  138.     Top = 90
  139.     Width = 51
  140.     Height = 13
  141.     Caption = 'Right Align'
  142.   end
  143.   object Label14: TLabel
  144.     Left = 8
  145.     Top = 198
  146.     Width = 76
  147.     Height = 13
  148.     Caption = 'First Char Upper'
  149.   end
  150.   object Label19: TLabel
  151.     Left = 196
  152.     Top = 126
  153.     Width = 77
  154.     Height = 13
  155.     Caption = 'Width On Focus'
  156.   end
  157.   object Label15: TLabel
  158.     Left = 92
  159.     Top = 162
  160.     Width = 38
  161.     Height = 13
  162.     Caption = 'Label15'
  163.     Font.Color = clAqua
  164.     Font.Height = -11
  165.     Font.Name = 'MS Sans Serif'
  166.     Font.Style = []
  167.     ParentFont = False
  168.   end
  169.   object Label20: TLabel
  170.     Left = 92
  171.     Top = 126
  172.     Width = 38
  173.     Height = 13
  174.     Caption = 'Label20'
  175.     Font.Color = clAqua
  176.     Font.Height = -11
  177.     Font.Name = 'MS Sans Serif'
  178.     Font.Style = []
  179.     ParentFont = False
  180.   end
  181.   object Label21: TLabel
  182.     Left = 8
  183.     Top = 162
  184.     Width = 39
  185.     Height = 13
  186.     Caption = 'SetFloat'
  187.   end
  188.   object Label22: TLabel
  189.     Left = 8
  190.     Top = 126
  191.     Width = 49
  192.     Height = 13
  193.     Caption = 'SetInteger'
  194.   end
  195.   object Label23: TLabel
  196.     Left = 196
  197.     Top = 198
  198.     Width = 88
  199.     Height = 13
  200.     Caption = 'DbEditN - Numeric'
  201.   end
  202.   object DbEditN: TLabel
  203.     Left = 196
  204.     Top = 162
  205.     Width = 52
  206.     Height = 13
  207.     Caption = 'MaskEditN'
  208.   end
  209.   object SpeedButton1: TSpeedButton
  210.     Left = 516
  211.     Top = 28
  212.     Width = 25
  213.     Height = 25
  214.     Enabled = False
  215.     Glyph.Data = {
  216.       1E010000424D1E010000000000007600000028000000180000000E0000000100
  217.       040000000000A800000000000000000000001000000000000000000000000000
  218.       80000080000000808000800000008000800080800000C0C0C000808080000000
  219.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777788888777
  220.       777788888777777F00008777777F77778777777F00008777777F77778777777F
  221.       00008777777F77778777777F00008777777F77778777777F00008777777F7777
  222.       8777788700008888788777778888F00000000008F77777777778F00000000007
  223.       F777777777777F00000000777F777777777777F00000077777F777777777777F
  224.       00007777777F777777777777F00777777777F777777777777F77777777777F77
  225.       7777}
  226.     NumGlyphs = 2
  227.     OnClick = SpeedButton1Click
  228.   end
  229.   object SpeedButton2: TSpeedButton
  230.     Left = 516
  231.     Top = 60
  232.     Width = 25
  233.     Height = 25
  234.     Enabled = False
  235.     Glyph.Data = {
  236.       1E010000424D1E010000000000007600000028000000180000000E0000000100
  237.       040000000000A800000000000000000000001000000000000000000000000000
  238.       80000080000000808000800000008000800080800000C0C0C000808080000000
  239.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777877777
  240.       7777778777777777700877777777777877777777000087777777777787777770
  241.       0000087777777777787777000000008777777777778770000000000877777777
  242.       7778F00000000008F77F77778778FFFF00007FF7FFFF77778FF7777F00008777
  243.       777F77778777777F00008777777F77778777777F00008777777F77778777777F
  244.       00008777777F77778777777F00008777777F77778777777FFFFF7777777FFFFF
  245.       7777}
  246.     NumGlyphs = 2
  247.     OnClick = SpeedButton2Click
  248.   end
  249.   object Label26: TLabel
  250.     Left = 8
  251.     Top = 234
  252.     Width = 23
  253.     Height = 13
  254.     Caption = 'Date'
  255.   end
  256.   object Label27: TLabel
  257.     Left = 8
  258.     Top = 270
  259.     Width = 23
  260.     Height = 13
  261.     Caption = 'Time'
  262.   end
  263.   object Label28: TLabel
  264.     Left = 92
  265.     Top = 234
  266.     Width = 38
  267.     Height = 13
  268.     Caption = 'Label28'
  269.     Font.Color = clAqua
  270.     Font.Height = -11
  271.     Font.Name = 'MS Sans Serif'
  272.     Font.Style = []
  273.     ParentFont = False
  274.   end
  275.   object Label29: TLabel
  276.     Left = 92
  277.     Top = 270
  278.     Width = 38
  279.     Height = 13
  280.     Caption = 'Label29'
  281.     Font.Color = clAqua
  282.     Font.Height = -11
  283.     Font.Name = 'MS Sans Serif'
  284.     Font.Style = []
  285.     ParentFont = False
  286.   end
  287.   object Label30: TLabel
  288.     Left = 196
  289.     Top = 234
  290.     Width = 119
  291.     Height = 13
  292.     Caption = 'DbEditN - FirstCharUpper'
  293.   end
  294.   object EditN1: TEditN
  295.     Left = 8
  296.     Top = 32
  297.     Width = 121
  298.     Height = 21
  299.     Color = clSilver
  300.     MaxLength = 7
  301.     TabOrder = 0
  302.     OnChange = EditN1Change
  303.     ColorOnFocus = clWhite
  304.     ColorOnNotFocus = clSilver
  305.     FontColorOnFocus = clRed
  306.     FontColorOnNotFocus = clBlack
  307.     EditType = etInteger
  308.     EditKeyByTab = #13
  309.     EditAlign = etAlignNone
  310.     EditLengthAlign = 0
  311.     EditPrecision = 0
  312.     ValueInteger = 11152
  313.     ValueDate = 35937.000000000000000000
  314.     ValueTime = 0.026158796296296290
  315.     TimeSeconds = False
  316.     FirstCharUpper = False
  317.     FirstCharUpList = ' ('
  318.     WidthOnFocus = 0
  319.   end
  320.   object EditN2: TEditN
  321.     Left = 8
  322.     Top = 68
  323.     Width = 121
  324.     Height = 21
  325.     Color = clSilver
  326.     TabOrder = 1
  327.     OnChange = EditN2Change
  328.     ColorOnFocus = clWhite
  329.     ColorOnNotFocus = clSilver
  330.     FontColorOnFocus = clRed
  331.     FontColorOnNotFocus = clBlack
  332.     EditType = etFloat
  333.     EditKeyByTab = #13
  334.     EditAlign = etAlignNone
  335.     EditLengthAlign = 0
  336.     EditPrecision = 2
  337.     ValueInteger = 0
  338.     ValueDate = 35937.000000000000000000
  339.     ValueTime = 0.026158796296296290
  340.     TimeSeconds = False
  341.     FirstCharUpper = False
  342.     FirstCharUpList = ' ('
  343.     WidthOnFocus = 0
  344.   end
  345.   object EditN3: TEditN
  346.     Left = 8
  347.     Top = 104
  348.     Width = 121
  349.     Height = 21
  350.     Color = clSilver
  351.     TabOrder = 2
  352.     OnChange = EditN3Change
  353.     OnExit = EditN3Change
  354.     ColorOnFocus = clWhite
  355.     ColorOnNotFocus = clSilver
  356.     FontColorOnFocus = clRed
  357.     FontColorOnNotFocus = clBlack
  358.     EditType = etInteger
  359.     EditKeyByTab = #13
  360.     EditAlign = etAlignValue
  361.     EditLengthAlign = 8
  362.     EditPrecision = 0
  363.     ValueInteger = 0
  364.     ValueDate = 35937.000000000000000000
  365.     ValueTime = 0.026159490740740740
  366.     TimeSeconds = False
  367.     FirstCharUpper = True
  368.     FirstCharUpList = ' ('
  369.     WidthOnFocus = 0
  370.   end
  371.   object EditN4: TEditN
  372.     Left = 196
  373.     Top = 32
  374.     Width = 117
  375.     Height = 21
  376.     Color = clSilver
  377.     TabOrder = 8
  378.     OnChange = EditN4Change
  379.     ColorOnFocus = clWhite
  380.     ColorOnNotFocus = clSilver
  381.     FontColorOnFocus = clRed
  382.     FontColorOnNotFocus = clBlack
  383.     EditType = etString
  384.     EditKeyByTab = #13
  385.     EditAlign = etAlignLeft
  386.     EditLengthAlign = 15
  387.     EditPrecision = 0
  388.     ValueInteger = 0
  389.     ValueDate = 35937.000000000000000000
  390.     ValueTime = 0.026159490740740740
  391.     TimeSeconds = False
  392.     FirstCharUpper = False
  393.     FirstCharUpList = ' ('
  394.     WidthOnFocus = 0
  395.   end
  396.   object EditN5: TEditN
  397.     Left = 196
  398.     Top = 68
  399.     Width = 117
  400.     Height = 21
  401.     Color = clSilver
  402.     TabOrder = 9
  403.     OnChange = EditN5Change
  404.     ColorOnFocus = clWhite
  405.     ColorOnNotFocus = clSilver
  406.     FontColorOnFocus = clRed
  407.     FontColorOnNotFocus = clBlack
  408.     EditType = etString
  409.     EditKeyByTab = #13
  410.     EditAlign = etAlignCenter
  411.     EditLengthAlign = 15
  412.     EditPrecision = 0
  413.     ValueInteger = 0
  414.     ValueDate = 35937.000000000000000000
  415.     ValueTime = 0.026159490740740740
  416.     TimeSeconds = False
  417.     FirstCharUpper = False
  418.     FirstCharUpList = ' ('
  419.     WidthOnFocus = 0
  420.   end
  421.   object EditN6: TEditN
  422.     Left = 196
  423.     Top = 104
  424.     Width = 117
  425.     Height = 21
  426.     Color = clSilver
  427.     TabOrder = 10
  428.     OnChange = EditN6Change
  429.     ColorOnFocus = clWhite
  430.     ColorOnNotFocus = clSilver
  431.     FontColorOnFocus = clRed
  432.     FontColorOnNotFocus = clBlack
  433.     EditType = etString
  434.     EditKeyByTab = #13
  435.     EditAlign = etAlignRight
  436.     EditLengthAlign = 15
  437.     EditPrecision = 0
  438.     ValueInteger = 0
  439.     ValueDate = 35937.000000000000000000
  440.     ValueTime = 0.026159490740740740
  441.     TimeSeconds = False
  442.     FirstCharUpper = False
  443.     FirstCharUpList = ' ('
  444.     WidthOnFocus = 0
  445.   end
  446.   object EditN7: TEditN
  447.     Left = 8
  448.     Top = 212
  449.     Width = 121
  450.     Height = 21
  451.     Color = clSilver
  452.     TabOrder = 5
  453.     OnChange = EditN7Change
  454.     ColorOnFocus = clWhite
  455.     ColorOnNotFocus = clSilver
  456.     FontColorOnFocus = clRed
  457.     FontColorOnNotFocus = clBlack
  458.     EditType = etString
  459.     EditKeyByTab = #13
  460.     EditAlign = etAlignNone
  461.     EditLengthAlign = 0
  462.     EditPrecision = 0
  463.     ValueInteger = 0
  464.     ValueDate = 35937.000000000000000000
  465.     ValueTime = 0.026159490740740740
  466.     TimeSeconds = False
  467.     FirstCharUpper = True
  468.     FirstCharUpList = ' ('
  469.     WidthOnFocus = 0
  470.   end
  471.   object Panel1: TPanel
  472.     Left = 10
  473.     Top = 320
  474.     Width = 171
  475.     Height = 109
  476.     TabOrder = 20
  477.     object Label16: TLabel
  478.       Left = 8
  479.       Top = 8
  480.       Width = 139
  481.       Height = 13
  482.       Caption = 'EditKeyByTab = #13 (Return)'
  483.     end
  484.     object Label17: TLabel
  485.       Left = 8
  486.       Top = 32
  487.       Width = 115
  488.       Height = 13
  489.       Caption = 'ColorOnFocus = clWhite'
  490.     end
  491.     object Label18: TLabel
  492.       Left = 8
  493.       Top = 48
  494.       Width = 130
  495.       Height = 13
  496.       Caption = 'ColorOnNotFocus = clSilver'
  497.     end
  498.     object Label24: TLabel
  499.       Left = 8
  500.       Top = 72
  501.       Width = 128
  502.       Height = 13
  503.       Caption = 'FontColorOnFocus = clRed'
  504.     end
  505.     object Label25: TLabel
  506.       Left = 8
  507.       Top = 88
  508.       Width = 152
  509.       Height = 13
  510.       Caption = 'FontColorOnNotFocus = clBlack'
  511.     end
  512.   end
  513.   object EditN8: TEditN
  514.     Left = 196
  515.     Top = 140
  516.     Width = 117
  517.     Height = 21
  518.     Color = clSilver
  519.     TabOrder = 11
  520.     ColorOnFocus = clWhite
  521.     ColorOnNotFocus = clSilver
  522.     FontColorOnFocus = clRed
  523.     FontColorOnNotFocus = clBlack
  524.     EditType = etString
  525.     EditKeyByTab = #13
  526.     EditAlign = etAlignNone
  527.     EditLengthAlign = 0
  528.     EditPrecision = 0
  529.     ValueInteger = 0
  530.     ValueDate = 35937.000000000000000000
  531.     ValueTime = 0.026159490740740740
  532.     TimeSeconds = False
  533.     FirstCharUpper = False
  534.     FirstCharUpList = ' ('
  535.     WidthOnFocus = 180
  536.   end
  537.   object BitBtn1: TBitBtn
  538.     Left = 200
  539.     Top = 408
  540.     Width = 117
  541.     Height = 25
  542.     TabOrder = 19
  543.     OnClick = BitBtn1Click
  544.     Kind = bkClose
  545.   end
  546.   object EditN9: TEditN
  547.     Left = 8
  548.     Top = 176
  549.     Width = 121
  550.     Height = 21
  551.     Color = clSilver
  552.     TabOrder = 4
  553.     OnChange = EditN9Change
  554.     ColorOnFocus = clWhite
  555.     ColorOnNotFocus = clSilver
  556.     FontColorOnFocus = clRed
  557.     FontColorOnNotFocus = clBlack
  558.     EditType = etFloat
  559.     EditKeyByTab = #13
  560.     EditAlign = etAlignNone
  561.     EditLengthAlign = 0
  562.     EditPrecision = 2
  563.     ValueInteger = 0
  564.     ValueDate = 35937.000000000000000000
  565.     ValueTime = 0.026159490740740740
  566.     TimeSeconds = False
  567.     FirstCharUpper = False
  568.     FirstCharUpList = ' ('
  569.     WidthOnFocus = 0
  570.   end
  571.   object EditN10: TEditN
  572.     Left = 8
  573.     Top = 140
  574.     Width = 121
  575.     Height = 21
  576.     Color = clSilver
  577.     TabOrder = 3
  578.     OnChange = EditN10Change
  579.     ColorOnFocus = clWhite
  580.     ColorOnNotFocus = clSilver
  581.     FontColorOnFocus = clRed
  582.     FontColorOnNotFocus = clBlack
  583.     EditType = etInteger
  584.     EditKeyByTab = #13
  585.     EditAlign = etAlignNone
  586.     EditLengthAlign = 8
  587.     EditPrecision = 0
  588.     ValueInteger = 0
  589.     ValueDate = 35937.000000000000000000
  590.     ValueTime = 0.026159490740740740
  591.     TimeSeconds = False
  592.     FirstCharUpper = True
  593.     FirstCharUpList = ' ('
  594.     WidthOnFocus = 0
  595.   end
  596.   object MEditN1: TMEditN
  597.     Left = 196
  598.     Top = 176
  599.     Width = 117
  600.     Height = 21
  601.     Color = clSilver
  602.     EditMask = '!99/99/0000;1;_'
  603.     MaxLength = 10
  604.     TabOrder = 12
  605.     Text = '  /  /    '
  606.     ColorOnFocus = clWhite
  607.     ColorOnNotFocus = clSilver
  608.     FontColorOnFocus = clRed
  609.     FontColorOnNotFocus = clBlack
  610.     EditKeyByTab = #13
  611.     WidthOnFocus = 0
  612.   end
  613.   object BitBtn2: TBitBtn
  614.     Left = 200
  615.     Top = 320
  616.     Width = 117
  617.     Height = 25
  618.     Caption = 'New Array Edit'
  619.     TabOrder = 15
  620.     OnClick = BitBtn2Click
  621.     Glyph.Data = {
  622.       F6000000424DF600000000000000760000002800000010000000100000000100
  623.       0400000000008000000000000000000000001000000010000000000000000000
  624.       BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
  625.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777711177
  626.       77777011117B9B17777700393911B9B177777193939393931777771939093939
  627.       3177719093009393917771303930093931777190939393939177771939193939
  628.       3177771393919393917771B939393939B9171B939311119B9B17193911777719
  629.       B9B1139177777771139171177777777771117777777777777777}
  630.   end
  631.   object BitBtn3: TBitBtn
  632.     Left = 200
  633.     Top = 348
  634.     Width = 117
  635.     Height = 25
  636.     Caption = 'Clear Edit'
  637.     Enabled = False
  638.     TabOrder = 16
  639.     OnClick = BitBtn3Click
  640.     Glyph.Data = {
  641.       76010000424D7601000000000000760000002800000020000000100000000100
  642.       04000000000000010000120B0000120B00001000000000000000000000000000
  643.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  644.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
  645.       555557777F777555F55500000000555055557777777755F75555005500055055
  646.       555577F5777F57555555005550055555555577FF577F5FF55555500550050055
  647.       5555577FF77577FF555555005050110555555577F757777FF555555505099910
  648.       555555FF75777777FF555005550999910555577F5F77777775F5500505509990
  649.       3055577F75F77777575F55005055090B030555775755777575755555555550B0
  650.       B03055555F555757575755550555550B0B335555755555757555555555555550
  651.       BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
  652.       50BB555555555555575F555555555555550B5555555555555575}
  653.     NumGlyphs = 2
  654.   end
  655.   object BitBtn4: TBitBtn
  656.     Left = 200
  657.     Top = 376
  658.     Width = 57
  659.     Height = 25
  660.     Caption = 'Plus'
  661.     Enabled = False
  662.     TabOrder = 17
  663.     OnClick = BitBtn4Click
  664.     Glyph.Data = {
  665.       DE000000424DDE0000000000000076000000280000000D0000000D0000000100
  666.       0400000000006800000000000000000000001000000010000000000000000000
  667.       BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
  668.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  669.       700077777777777770007777700077777000777770C077777000777770C07777
  670.       7000770000C000077000770CCCCCCC077000770000C000077000777770C07777
  671.       7000777770C07777700077777000777770007777777777777000777777777777
  672.       7000}
  673.   end
  674.   object DBEditN1: TDBEditN
  675.     Left = 196
  676.     Top = 212
  677.     Width = 117
  678.     Height = 21
  679.     Hint = 'Change Register with cursor arrow'
  680.     Color = clSilver
  681.     MaxLength = 0
  682.     TabOrder = 13
  683.     OnKeyDown = DBEditN1KeyDown
  684.     ColorOnFocus = clWhite
  685.     ColorOnNotFocus = clSilver
  686.     FontColorOnFocus = clRed
  687.     FontColorOnNotFocus = clBlack
  688.     EditKeyByTab = #13
  689.     FirstCharUpper = False
  690.     FirstCharUpList = ' ('
  691.     WidthOnFocus = 0
  692.   end
  693.   object BitBtn5: TBitBtn
  694.     Left = 260
  695.     Top = 376
  696.     Width = 57
  697.     Height = 25
  698.     Caption = 'Minus'
  699.     Enabled = False
  700.     TabOrder = 18
  701.     OnClick = BitBtn4Click
  702.     Glyph.Data = {
  703.       DE000000424DDE0000000000000076000000280000000D0000000D0000000100
  704.       0400000000006800000000000000000000001000000010000000000000000000
  705.       BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
  706.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  707.       7000777777777777700077777777777770007777777777777000777777777777
  708.       70007700000000077000770CCCCCCC0770007700000000077000777777777777
  709.       7000777777777777700077777777777770007777777777777000777777777777
  710.       7000}
  711.   end
  712.   object EditN11: TEditN
  713.     Left = 8
  714.     Top = 248
  715.     Width = 121
  716.     Height = 21
  717.     Color = clSilver
  718.     TabOrder = 6
  719.     OnExit = EditN11Exit
  720.     ColorOnFocus = clWhite
  721.     ColorOnNotFocus = clSilver
  722.     FontColorOnFocus = clRed
  723.     FontColorOnNotFocus = clBlack
  724.     EditType = etDate
  725.     EditKeyByTab = #13
  726.     EditAlign = etAlignNone
  727.     EditLengthAlign = 0
  728.     EditPrecision = 0
  729.     ValueInteger = 0
  730.     ValueDate = 35937.000000000000000000
  731.     ValueTime = 0.026631828703703700
  732.     TimeSeconds = False
  733.     FirstCharUpper = False
  734.     FirstCharUpList = ' ('
  735.     WidthOnFocus = 0
  736.   end
  737.   object EditN12: TEditN
  738.     Left = 8
  739.     Top = 284
  740.     Width = 121
  741.     Height = 21
  742.     Color = clSilver
  743.     TabOrder = 7
  744.     OnExit = EditN12Exit
  745.     ColorOnFocus = clWhite
  746.     ColorOnNotFocus = clSilver
  747.     FontColorOnFocus = clRed
  748.     FontColorOnNotFocus = clBlack
  749.     EditType = etTime
  750.     EditKeyByTab = #13
  751.     EditAlign = etAlignNone
  752.     EditLengthAlign = 0
  753.     EditPrecision = 0
  754.     ValueInteger = 0
  755.     ValueDate = 35937.000000000000000000
  756.     ValueTime = 0.026631828703703700
  757.     TimeSeconds = True
  758.     FirstCharUpper = False
  759.     FirstCharUpList = ' ('
  760.     WidthOnFocus = 0
  761.   end
  762.   object DBEditN2: TDBEditN
  763.     Left = 196
  764.     Top = 248
  765.     Width = 117
  766.     Height = 21
  767.     Hint = 'Change Register with cursor arrow'
  768.     Color = clSilver
  769.     MaxLength = 0
  770.     TabOrder = 14
  771.     OnKeyDown = DBEditN1KeyDown
  772.     ColorOnFocus = clWhite
  773.     ColorOnNotFocus = clSilver
  774.     FontColorOnFocus = clRed
  775.     FontColorOnNotFocus = clBlack
  776.     EditKeyByTab = #13
  777.     FirstCharUpper = True
  778.     FirstCharUpList = ' ('
  779.     WidthOnFocus = 0
  780.   end
  781.   object Table1: TTable
  782.     Left = 328
  783.     Top = 208
  784.   end
  785.   object DataSource1: TDataSource
  786.     DataSet = Table1
  787.     Left = 384
  788.     Top = 208
  789.   end
  790. end
  791.